package com.atguigu.gulimall.product.service.impl;

import com.alibaba.fastjson.JSON;
import com.alibaba.fastjson.TypeReference;
import com.atguigu.common.constant.ProductConstant;
import com.atguigu.common.utils.PageUtils;
import com.atguigu.common.utils.Query;
import com.atguigu.gulimall.product.dao.CategoryDao;
import com.atguigu.gulimall.product.entity.CategoryEntity;
import com.atguigu.gulimall.product.service.CategoryBrandRelationService;
import com.atguigu.gulimall.product.service.CategoryService;
import com.atguigu.gulimall.product.vo.web.Catelog2Vo;
import com.baomidou.mybatisplus.core.conditions.query.QueryWrapper;
import com.baomidou.mybatisplus.core.metadata.IPage;
import com.baomidou.mybatisplus.extension.service.impl.ServiceImpl;
import lombok.extern.slf4j.Slf4j;
import org.apache.commons.lang3.StringUtils;
import org.redisson.api.RLock;
import org.redisson.api.RedissonClient;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.cache.annotation.CacheEvict;
import org.springframework.cache.annotation.Cacheable;
import org.springframework.data.redis.core.StringRedisTemplate;
import org.springframework.data.redis.core.script.DefaultRedisScript;
import org.springframework.stereotype.Service;
import org.springframework.transaction.annotation.Transactional;

import javax.annotation.Resource;
import java.util.*;
import java.util.concurrent.TimeUnit;
import java.util.stream.Collectors;


/**
 * @author ShiJieLin
 */
@Service("categoryService")
@Slf4j
public class CategoryServiceImpl extends ServiceImpl<CategoryDao, CategoryEntity> implements CategoryService {

    @Resource
    private CategoryBrandRelationService categoryBrandRelationService;
    @Autowired
    private StringRedisTemplate redisTemplate;
    @Autowired
    private RedissonClient redissonClient;

    @Override
    public PageUtils queryPage(Map<String, Object> params) {
        IPage<CategoryEntity> page = this.page(
                new Query<CategoryEntity>().getPage(params),
                new QueryWrapper<CategoryEntity>()
        );

        return new PageUtils(page);
    }

    @Override
    public List<CategoryEntity> listTree() {
        // 1.查出所有的分类
        List<CategoryEntity> categoryEntities = baseMapper.selectList(null);

        // 2.找出父类ID
        List<CategoryEntity> oneLevel = categoryEntities.stream()
                // 1. 找出一级分类
                .filter(ce -> ce.getParentCid() == 0L)
                // 2. 将一级分类再次遍历寻找下面的子分类
                .map(ce -> {
                    ce.setChildren(findChildren(ce, categoryEntities));
                    return ce;
                }).sorted(Comparator.comparingInt(menu -> (menu.getSort() == null ? 0 : menu.getSort())))
                .collect(Collectors.toList());

        return oneLevel;
    }

    @Override
    public void removeMenuByIds(List<Long> asList) {
        // TODO 后续需要写检查菜单是否有被引用才能删除

        baseMapper.deleteBatchIds(asList);
    }

    @Override
    public Long[] getCatelogPath(Long catelogId) {

        List<Long> paths = new ArrayList<>();
        List<Long> parentPath = findParentPath(catelogId, paths);

        return parentPath.toArray(new Long[parentPath.size()]);
    }

    /**
     * 级联更新所有关联的数据
     *
     * @CacheEvict:失效模式
     * @CachePut:双写模式，需要有返回值
     * 1、同时进行多种缓存操作：@Caching
     * 2、指定删除某个分区下的所有数据 @CacheEvict(value = "category",allEntries = true)
     * 3、存储同一类型的数据，都可以指定为同一分区
     * @param category
     */
    // @Caching(evict = {                    // key如果是字符串 得在使用 单引号
    //         @CacheEvict(value = "category",key = "'getLevel1Categorys'"),
    //         @CacheEvict(value = "category",key = "'getCatalogJson'")
    // })
    @CacheEvict(value = "category",allEntries = true)       //删除某个分区下的所有数据
    @Override
    @Transactional(rollbackFor = Exception.class)
    public void updateDetail(CategoryEntity category) {

        this.updateById(category);

        if (!StringUtils.isEmpty(category.getName())) {
            // 更新关联数据的名称
            categoryBrandRelationService.updateCategory(category.getCatId(), category.getName());
            // TODO 更新关联数据的名称
        }
    }

    @Cacheable(value = {"categorys"})
    @Override
    public List<CategoryEntity> getLevel1Categorys() {

        List<CategoryEntity> categoryEntities = baseMapper.selectList(new QueryWrapper<CategoryEntity>()
                .eq("parent_cid", ProductConstant.CategoryEnum.CATEGORY_ID.getCode()));
        return categoryEntities;
    }

    /**
     * 优化，整合redis
     * 1、空结果缓存：解决缓存穿透问题
     * 2、设置过期时间(加随机值)：解决缓存雪崩
     * 3、加锁：解决缓存击穿问题
     *
     * @return
     */
    @Override
    public Map<String, List<Catelog2Vo>> getCatalogJson() {

        // 1.从redis中取出分类
        String catalogJson = redisTemplate.opsForValue().get("catalogJson");
        // 2.如果没有则去数据库中查询，并且存入reids中
        if (StringUtils.isEmpty(catalogJson)) {

            log.info("缓存没有命中.....查询数据库~！");
            Map<String, List<Catelog2Vo>> catalogJsonFromData = this.getCatalogJsonFromDbWithRedissonLock();
            return catalogJsonFromData;
        }
        Map<String, List<Catelog2Vo>> listMap =
                JSON.parseObject(catalogJson, new TypeReference<Map<String, List<Catelog2Vo>>>() {
                });
        log.info("缓存命中.....返回Redis数据~！");
        return listMap;
    }

    /** 使用redisson来进行分布式加锁
     * @return
     */
    public Map<String, List<Catelog2Vo>> getCatalogJsonFromDbWithRedissonLock(){

        RLock rLock = redissonClient.getLock("catalogJson-lock");

        Map<String, List<Catelog2Vo>> catelogMap = null;

        try {
            rLock.lock();
            // 1.从redis中取出分类
            String catalogJson = redisTemplate.opsForValue().get("catalogJson");

            // 2.如果没有则去数据库中查询，并且存入reids中
            if (!StringUtils.isEmpty(catalogJson)) {

                catelogMap = JSON.parseObject(catalogJson,
                        new TypeReference<Map<String, List<Catelog2Vo>>>() {});

                return catelogMap;
            }
            catelogMap = this.getCatelogMap();
        } finally {
            rLock.unlock();
        }
        return catelogMap;
    }


    /**
     * 使用redis实现分布式锁
     * 所有线程都去redis中抢占 set lock "222" NX
     * 只会有一个线程能抢占到，要保证操作的原子性
     *
     * @return
     */
    public Map<String, List<Catelog2Vo>> getCatalogJsonFromDbWithRedisLock() {
        // 1.保证抢占到的锁，设置进redis中的值是唯一，方便操作之后删除。避免过期时间之后，删除掉其他线程的锁
        String lockValue = UUID.randomUUID().toString();
        // 2.保证设置锁的值和过期时间是同步的，是为了保证操作原子性，避免出现死锁
        Boolean lock = redisTemplate.opsForValue().setIfAbsent("lock", lockValue, 300, TimeUnit.SECONDS);
        // 3.判断
        if (lock) {
            log.info("获取分布式锁成功：{}" + lockValue);
            Map<String, List<Catelog2Vo>> catelogMap = null;
            try {
                // 加锁成功，执行业务代码。如果业务代码时效时间长，可能造成锁的过期，造成锁不住
                catelogMap = this.getCatelogMap();
            } finally {
                // lua脚本：保证获取的 lock 和 value 的原子性
                String script = "if redis.call('get', KEYS[1]) == ARGV[1] " +
                        "then return redis.call('del', KEYS[1]) else return 0 end";
                // 删除锁
                redisTemplate.execute(new DefaultRedisScript<Long>(script, Long.class),
                        Arrays.asList("lock"), lockValue);
                return catelogMap;
            }
        } else {
            // 加锁失败...重试机制
            log.info("获取分布式锁失败...等待重试...");

            // 有一个线程查询了数据库之后，那么之后的都去redis，避免多次查询数据库
            String catalogJson = redisTemplate.opsForValue().get("catalogJson");
            if (!StringUtils.isEmpty(catalogJson)) {
                Map<String, List<Catelog2Vo>> listMap =
                        JSON.parseObject(catalogJson, new TypeReference<Map<String, List<Catelog2Vo>>>() {
                        });
                return listMap;
            }
            try {
                // 休眠一百毫秒
                TimeUnit.MILLISECONDS.sleep(100);
            } catch (InterruptedException e) {
                e.printStackTrace();
            }
            // 自旋的方式
            return getCatalogJsonFromDbWithRedisLock();
        }
    }

    /**
     * 数据库中查询分类 ：
     * 加本地锁：
     * 1.比分布式锁效率高
     * 2.但是只能锁住当前的服务，分布式下锁不主，有多少个服务就要查询多少次
     *
     * @return
     */
    public Map<String, List<Catelog2Vo>> getCatalogJsonWithLocalLock() {
        /** 加上本地锁
         */
        synchronized (this) {
            // 有一个线程查询了数据库之后，那么之后的都去redis，避免多次查询数据库
            String catalogJson = redisTemplate.opsForValue().get("catalogJson");
            if (!StringUtils.isEmpty(catalogJson)) {
                Map<String, List<Catelog2Vo>> listMap =
                        JSON.parseObject(catalogJson, new TypeReference<Map<String, List<Catelog2Vo>>>() {
                        });
                return listMap;
            }
            Map<String, List<Catelog2Vo>> catelogMap = getCatelogMap();
            /** 保证原子操作
             *  再将结果放入缓存之后，再释放锁
             */
            String jsonString = JSON.toJSONString(catelogMap);
            // 避免缓存雪崩,
            redisTemplate.opsForValue().set("catalogJson", jsonString, 1, TimeUnit.DAYS);
            return catelogMap;
        }
    }

    /**
     * 查询分类
     *
     * @return
     */
    private Map<String, List<Catelog2Vo>> getCatelogMap() {

        log.info("查询数据库......!");
        List<CategoryEntity> categoryEntityList = baseMapper.selectList(null);
        // 1.获取一级分类id
        List<CategoryEntity> level1Categorys = getParentCid(categoryEntityList, ProductConstant.CategoryEnum.CATEGORY_ID.getCode());
        // 2.将数据转化为一个map                             key：为一级分类的ID
        Map<String, List<Catelog2Vo>> catelogMap = level1Categorys.stream().collect(Collectors.toMap(key -> key.getCatId().toString(),
                value -> {
                    // 2.1 查询出二级分类
                    List<CategoryEntity> level2Categorys = getParentCid(categoryEntityList, value.getCatId());
                    // 2.2 遍历二级分类分装数据
                    List<Catelog2Vo> catelog2VoList = level2Categorys.stream().map(level2 -> {
                        // 2.3 封装2级分类数据
                        Catelog2Vo catelog2Vo = new Catelog2Vo();
                        catelog2Vo.setCatalog1Id(value.getCatId().toString());
                        catelog2Vo.setId(level2.getCatId().toString());
                        catelog2Vo.setName(level2.getName());
                        // 2.4 查询三级分类数据
                        List<CategoryEntity> level3Categorys = getParentCid(categoryEntityList, level2.getCatId());

                        List<Catelog2Vo.Category3Vo> category3VoList = level3Categorys.stream().map(level3 -> {
                            Catelog2Vo.Category3Vo category3Vo = new Catelog2Vo.Category3Vo();
                            category3Vo.setCatalog2Id(level2.getCatId().toString());
                            category3Vo.setId(level3.getCatId().toString());
                            category3Vo.setName(level3.getName());
                            return category3Vo;
                        }).collect(Collectors.toList());
                        // 封装三级分类数据
                        catelog2Vo.setCatalog3List(category3VoList);
                        return catelog2Vo;
                    }).collect(Collectors.toList());
                    return catelog2VoList;
                }));
        /** 保证原子操作
         *  再将结果放入缓存之后，再释放锁
         */
        String jsonString = JSON.toJSONString(catelogMap);
        // 避免缓存雪崩,
        redisTemplate.opsForValue().set("catalogJson", jsonString, 1, TimeUnit.DAYS);
        return catelogMap;
    }

    /**
     * 过滤出当前父分类ID下的子分类
     *
     * @param categoryEntityList 包含所有分类
     * @param parentCid          父分类ID
     * @return
     */
    private List<CategoryEntity> getParentCid(List<CategoryEntity> categoryEntityList, Long parentCid) {

        List<CategoryEntity> entities = categoryEntityList.stream().filter((categoryEntity)
                -> categoryEntity.getParentCid().equals(parentCid)).collect(Collectors.toList());

        return entities;
    }


    /**
     * 递归查找某一个三级分类所有的父id
     *
     * @param catelogId 三级分类id
     * @param paths
     * @return
     */
    private List<Long> findParentPath(Long catelogId, List<Long> paths) {

        QueryWrapper<CategoryEntity> queryWrapper = new QueryWrapper<>();
        queryWrapper.eq("cat_id", catelogId);
        queryWrapper.select("cat_id", "parent_cid");

        CategoryEntity entity = this.getById(catelogId);

        if (entity.getParentCid() != 0L) {
            findParentPath(entity.getParentCid(), paths);
        }
        paths.add(catelogId);

        return paths;
    }

    /**
     * 使用递归找出所有的子类
     *
     * @param root             父分类
     * @param categoryEntities 所有的分类
     * @return
     */
    private List<CategoryEntity> findChildren(CategoryEntity root, List<CategoryEntity> categoryEntities) {

        List<CategoryEntity> children = categoryEntities.stream()
                // 1.找出二级分类
                .filter(categoryEntity -> Objects.equals(categoryEntity.getParentCid(), root.getCatId()))
                .map(categoryEntity -> {
                    // 2. 使用递归找到子分类
                    categoryEntity.setChildren(findChildren(categoryEntity, categoryEntities));
                    return categoryEntity;
                })
                // 3.排序
                .sorted(Comparator.comparingInt(menu -> menu.getSort() == null ? 0 : menu.getSort()))
                .collect(Collectors.toList());
        return children;
    }

}